home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #1 / Amiga Plus CD - 2000 - No. 1.iso / Tools / OS3.5 / RAWBInfo / Install next >
Text File  |  1999-12-03  |  2KB  |  79 lines
  1. ; $VER: Installer script for RAWInfo 1.0 (03.10.99) © 1999 by Stephan Rupprecht
  2.  
  3. ;--- localize strings ----
  4. (if (= @language "deutsch")
  5. (
  6.     (set #wrongver "RAWBInfo benötigt mindestens AmigaOS3.5.\nInstallation kann nicht durchgeführt werden.")
  7.     (set #askdir_prompt "Bitte wählen Sie das Zielverzeichnis für den RAWBInfo")
  8. )
  9. (
  10.     
  11.     (set #wrongver "RAWBInfo requires at least AmigaOS3.5\nInstallation aborted.")
  12.     (set #askdir_prompt "Please select the drawer where RAWBInfo should be installed")
  13. )
  14. )
  15.  
  16. ;--- check os version ---
  17. (set #vernum (getversion "workbench.library" (resident)))
  18. (set #vernum (/ #vernum 65536))
  19.  
  20. (if(< #vernum 44)
  21.     (abort #wrongver)
  22. )
  23.  
  24. ;--- copy main program ---
  25. (set @default-dest
  26.     (askdir
  27.         (prompt #askdir_prompt)
  28.         (help @askdir-help)
  29.         (default "SYS:WBStartup")
  30.     )
  31. )
  32.  
  33. (copyfiles
  34.     (help @copyfiles-help)
  35.     (source "RAWBInfo")
  36.     (dest @default-dest)
  37. )
  38.  
  39. ;--- copy .info file if neccessary ---
  40. (set #info_path (tackon @default-dest "RAWBInfo.info") )
  41.  
  42. (if (not (exists #info_path) )
  43.     (copyfiles
  44.         (help @copyfiles-help)
  45.         (source "RAWBInfo.info")
  46.         (dest @default-dest)
  47.     )
  48. )
  49.  
  50. ;--- copy catalog ---
  51. (if (NOT (= @language "english")) 
  52. (
  53.     (set #src_name
  54.         (tackon "Catalogs/" @language)
  55.     )
  56.  
  57.     (set #dst_name
  58.         (tackon "LOCALE:" #src_name)
  59.     )
  60.  
  61.     (set #src_name
  62.         (tackon #src_name "rawbinfo.catalog")
  63.     )
  64.  
  65.     (if (exists #src_name (noreq))
  66.     (
  67.         (copyfiles
  68.             (help @copyfiles-help)
  69.             (source #src_name)
  70.             (dest #dst_name)
  71.         )
  72.     )
  73.         (message "Sorry, there is no " @language " catalog available at the moment!")
  74.     ) 
  75. )
  76. )
  77.  
  78. ;--- eof ---
  79.